home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / scope / 151-175 / scopedisk168 / tinytools / noreq / noreq.asm < prev    next >
Assembly Source File  |  1995-03-19  |  369b  |  22 lines
  1.  
  2.        INCLUDE "/include/init.i"
  3.  
  4. ; No sys funcs so no stack needed.
  5.  
  6.        STACK   100
  7.  
  8. ; Be done with it
  9.  
  10.        MOVE.L  $4.W,A6
  11.        MOVE.L  ThisTask(A6),A0
  12.        MOVEQ   #-1,D0
  13.        CMP.L   pr_WindowPtr(A0),D0
  14.        BNE.S   NotYetInhibited
  15.        MOVEQ   #0,D0
  16. NotYetInhibited:
  17.        MOVE.L  D0,pr_WindowPtr(A0)
  18.        MOVEQ   #0,D0
  19.        RTS
  20.  
  21.        END
  22.